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d GPort£olioManager:;: GetTotal Asset (doubled total, doubled totalFixed, int yearlndex) 
double s, rtax, rtaxl; 

rtax • CC( year Index, CTD: : FITR)+CC(yearIndex, CTD : :SITR) ; 
rtax /= (1-rtax); 

rtaxl = CC(yearIndex, CTD: :FCGR)+ CC(yearIndex. CTD::SCGR); 
rtaxl /- (1-rtaxl); 



£or(int 
{ 



s + ! 
s + ! 



C401KATM); 
C401KATB)»rtax; 



i=0; i<m_pVtifL->m_vtin->in_nNuaber Of Assets; i++) 

m_ vPor t £ o 1 i os [ PORTF_J T ] - > Ge t Ba lance ( ) « A A ( i , ATD : : TPM ) ; 
< »_vPortfolios[PORTF_JT]->GetBasis()*AA(i.ATD: :TPB)*rtaxl; 

- m_vPortfolios[PORTF_CDYC]->GetBalance()»AA(i,ATD: :C401KYC); 

• m_vPor t £ o 1 ios [ PORTF_CDNC ] - >Ge t Ba 1 ance ( ) * A A ( i , ATD : :C401KNC); 
= »_vPor t £ o 1 ios [ PORTF_C_POSTT AX_ 4 0 IK ] - >Ge t Ba lance ( ) « A A ( i , ATD : 

• m_vPortfolios[PORTF_C_POSTTAX_401K]->GetBasis()*AA(i.ATD: ~ 
■■ m_vPor t£ol ios [ PORTF_CI ]->Get Balance ( )*AA( i . ATD : :CIRA); 

■ m_vPor t £ o 1 i os [ PORTF_C_ROTH_ IRA]-> Ge tBa lance ( )*AA( i . ATD : : CROTH I RAM ) ; 

- m_vPor t £ol ios [ PORTF_C_ROTlTlRA ] - >Get Basis ( ) *AA ( i . ATD : : CROTHIRAB ) *r tax ; 
> m_vPor t f ol ios [ PORTF_C_VA ] -TGe t Ba 1 ance ( ) *AA ( i , ATD : :CVAM); 

• ra vPor tfol ios [PORTF_C_VA]->Get Basis ( )*AA( i . ATD : :CVAB)*rtax; 

• m_vPortf olios [PORTF_C_POSTTAX_ IRA]- >Get Balance ( )*AA(i. ATD: : CPOSTTAXIRAM) ; . 

■ iri_vPor t f ol ios [ PORTF_C_POSTTAX_IRA ]- >Get Basis ( )*AA( i , ATD: : CPOSTTAXIRAB) »rtax ; 

■ m_vPortfolios[PORTF_C_403B]->GetBalance()*AA(i,ATD: :C403BM); 
s +» m_ vPort£ol ios [PORTF_C_4 57 ]->Get Balance ( )*AA( i, ATD : :C457M) ; 

i £ ( »_pW t m- > m_ v t i n- > i n_bl nc 1 udeSpouse ) 

{ s + - m_vPortf olios[PORTF_SDYC ]->Ge tBa lance ( )*AA(i, ATD: :S401KF> ; 

m_ vPor t f o 1 i os [ P0RTF_S POSTT AX_ 4 0 1 K ] - > Ge t Ba 1 ance ( ) * A A ( i . ATD : : S4 0 IK ATM ) ; 
m_vPortf olios[PORTF_sZPOSTTAX_401K }->GetBasis( )*AA( i , ATD : :S401KATB)*rtax ; 
m_vPortf olios [PORTF_SI J- >GetBa lance ( ) »AA ( i , ATD : : SI RA ) ; 
m_ vPor t f o 1 i os [ PORTF_S_ROTH_ I R A ] - >Ge t Ba 1 ance ( ) *AA ( i . ATD : : SROTHIRAM ) ; 
m_vPor t f ol ios[ PORTF_S_ROTH_IRA ]- >GetBasis( ) «AA ( i . ATD : : SROTHIRAB )*rtax ; 
ra_vPort£olios[PORTF_S_VA]->GetBalance()«AA(i.ATD: :SVAM); 
n wPnrt.fnHnsTPnRTF S VA l->Gnt-.Rflffi sM*AA i \ ATD- SVAR^rt.ax' 
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The function, GetTotalAsset, shown below determines the total financial assets of 
the investor as well as the total financial assets currently allocated to Fixed Income. 

void GPortfolioManager::GetTotalAsset(double& total, double& totalFixed, int 
yearlndex) 

{ 

double s, rtax, rtaxl; 

rtax = CC(yearIndex,CTD::FITR)+CC(yearIndex,CTD::SITR); 
rtax I- (1-rtax); 

rtaxl = CC(yearIndex, CTD::FCGR)+ CC(yearIndex, CTD::SCGR); 
rtaxl /=(1 -rtaxl); 

for(inti=0;i<mjWtm->m_wtin->in_nNumberOfAssets;i++) 
{ 

s = m_vPortfolios[PORTF_JT]->GetBalance()*AA(i,ATD::TPM); 

s += m_vPortfolios[PORTF_JT]->GetBasis()*AA(i,ATD::TPB)*rtaxl; 

s += m_vPortfolios[PORTF_CDYC]- 
>GetBalance()*AA(i,ATD::C401KYC); 

s += m_vPortfolios[PORTF_CDNC]- 
>GetBalance()*AA(i,ATD::C401KNC); 

// s += m_vPortfolios[PORTF_C_POSTTAX_401K]- 

>GetBalanceO* AA(i,ATD: :C40 1 KATM); 

// s += m_vPortfolios[PORTF_C_POSTTAX_40 1 K] - 

>GetBasis() * A A(i, ATD : : C40 1 K ATB) * rtax; 

s += m_vPortfolios[PORTF_CI]->GetBalance()*AA(i,ATD::CIRA); 

s += m_vPortfolios[PORTF_C_ROTH_IRA]- 
>GetBalance()*AA(i,ATD::CROTHIRAM); 

s += m_vPortfolios[PORTF_C_ROTH_IRA]- 
>GetBasis() * A A(i, ATD : : CROTHIRAB) * rtax ; 

s += m_vPortfolios[PORTF_C_VA]->GetBalance()*AA(i,ATD::CVAM); 

s += m_vPortfolios[PORTF_C_VA]- 
>GetBasis()*AA(i,ATD::CVAB)*rtax; 

s += m_vPortfolios[PORTF_C_POSTTAX_IRA]- 
>GetBalance()*AA(i,ATD::CPOSTTAXIRAM); 

s += m_vPortfolios[PORTF_C_POSTTAX_IRA]- 
>GetBasis()*AA(i,ATD::CPOSTTAXIRAB)*rtax; 

s += m_vPortfolios[PORTF_C_403B]- 
>GetBalance()*AA(i,ATD::C403BM); 

s += m_vPortfolios[PORTF_C_457]->GetBalance()*AA(i,ATD::C457M); 

if (m_pWtm->m_wtin->in_bIncludeSpouse) 
{ 

s += m_vPortfolios[PORTF_SDYC]- 
>GetBalance()*AA(i,ATD::S40 1 KF); 



s += m_vPortfolios[PORTF_S_POSTTAX_401K]- 
>GetBalance()* AA(i, ATD : : S40 1 KATM); 

s += m_vPortfolios[PORTF_S_POSTTAX_401K]- 
>GetBasis()*AA(i,ATD::S40 1 KATB)*rtax; 

s += m_vPortfolios[PORTF_SI]- 
>GetBalance()*AA(i,ATD::SIRA); 

s += m_vPortfolios[PORTF_S_ROTH_IRA]- 
>GetBalance()*AA(i,ATD::SROTHIRAM); 

s += m_vPortfolios[PORTF_S_ROTH_IRA]- 
>GetBasis()*AA(i,ATD::SROTHIRAB)*rtax; 

s += m_vPortfolios[PORTF_S_VA]- 
>GetBalance()* AA(i,ATD: :SVAM); 

s += m_vPortfolios[PORTF_S_VA]- 
>GetBasis()*AA(i,ATD::SVAB)*rtax; 

s += m_vPortfolios[PORTF_S_POSTTAX_IRA]- 
>GetBalance()*AA(i,ATD::SPOSTTAXIRAM); 

s += m_vPortfolios[PORTF_S_POSTTAX_IRA]- 
>GetBasis()*AA(i,ATD::SPOSTTAXIRAB)*rtax; 

s += m_vPortfolios[PORTF_S_403B]- 
>GetBalance()* AA(i,ATD: :S403BM); 

s += m_vPortfolios[PORTF_S_457]- 
>GetBalance()*AA(i,ATD::S457M); 

} 

total += s; 

totalFixed += s*(!(int)AA(i,ATD::IS_STOCK)); 



